home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue31 / webcomm / TRNPF.DFM / TRNPF.txt
Encoding:
Text File  |  1998-01-12  |  2.4 KB  |  126 lines

  1. object Form1: TForm1
  2.   Left = 394
  3.   Top = 147
  4.   Width = 365
  5.   Height = 249
  6.   Caption = 'Sample Transaction Processor'
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -13
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   ShowHint = True
  13.   WindowState = wsMinimized
  14.   OnCreate = FormCreate
  15.   PixelsPerInch = 120
  16.   TextHeight = 16
  17.   object Panel1: TPanel
  18.     Left = 0
  19.     Top = 0
  20.     Width = 357
  21.     Height = 217
  22.     Align = alClient
  23.     BevelOuter = bvNone
  24.     TabOrder = 0
  25.     object Label2: TLabel
  26.       Left = 9
  27.       Top = 61
  28.       Width = 80
  29.       Height = 16
  30.       Caption = 'Card number:'
  31.     end
  32.     object Label3: TLabel
  33.       Left = 9
  34.       Top = 93
  35.       Width = 70
  36.       Height = 16
  37.       Caption = 'Expiry date:'
  38.     end
  39.     object Label4: TLabel
  40.       Left = 9
  41.       Top = 125
  42.       Width = 48
  43.       Height = 16
  44.       Caption = 'Amount:'
  45.     end
  46.     object Label5: TLabel
  47.       Left = 9
  48.       Top = 157
  49.       Width = 90
  50.       Height = 16
  51.       Caption = 'Transaction ID:'
  52.     end
  53.     object Panel2: TPanel
  54.       Left = 0
  55.       Top = 0
  56.       Width = 357
  57.       Height = 41
  58.       Align = alTop
  59.       TabOrder = 0
  60.       object Label1: TLabel
  61.         Left = 8
  62.         Top = 8
  63.         Width = 100
  64.         Height = 16
  65.         Caption = 'Queue Directory:'
  66.       end
  67.       object Edit1: TEdit
  68.         Left = 120
  69.         Top = 5
  70.         Width = 225
  71.         Height = 24
  72.         Hint = 'Directory in which ".trn" transaction files will be placed'
  73.         TabOrder = 0
  74.         OnChange = Edit1Change
  75.       end
  76.     end
  77.     object Edit2: TEdit
  78.       Left = 120
  79.       Top = 56
  80.       Width = 225
  81.       Height = 24
  82.       TabOrder = 1
  83.     end
  84.     object Edit3: TEdit
  85.       Left = 120
  86.       Top = 88
  87.       Width = 225
  88.       Height = 24
  89.       TabOrder = 2
  90.     end
  91.     object Edit4: TEdit
  92.       Left = 120
  93.       Top = 120
  94.       Width = 225
  95.       Height = 24
  96.       TabOrder = 3
  97.     end
  98.     object Edit5: TEdit
  99.       Left = 120
  100.       Top = 152
  101.       Width = 225
  102.       Height = 24
  103.       TabOrder = 4
  104.     end
  105.     object Status: TPanel
  106.       Left = 0
  107.       Top = 200
  108.       Width = 357
  109.       Height = 17
  110.       Align = alBottom
  111.       BevelInner = bvLowered
  112.       TabOrder = 5
  113.     end
  114.   end
  115.   object SimpleFileTransactionProcessor1: TSimpleFileTransactionProcessor
  116.     Left = 16
  117.     Top = 48
  118.   end
  119.   object Timer1: TTimer
  120.     Interval = 5000
  121.     OnTimer = Timer1Timer
  122.     Left = 24
  123.     Top = 80
  124.   end
  125. end
  126.